	<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
	<meta http-equiv="keywords" content="" />
	<meta http-equiv="description" content="" />

	<script type="text/javascript" src="/code/mine.js"></script>

	<link rel="stylesheet" media="all" type="text/css" href="/code/all.css" />
	<link rel="stylesheet" media="print" type="text/css" href="/code/print.css" />
	<link rel="stylesheet" media="handheld" type="text/css" href="/code/handheld.css" />
	<style type="text/css">
		#page {margin-top:2px;float:left;border-left:210px solid #FFF;border-right:0px solid #FFF;clear:both;width:690px;}
		#content {float:left;width:640px;margin-right:-690px;margin-top:36px;border-left:0px solid #FFF;margin-left:0px;padding:0px;padding-right:50px;}
		#content h2 {margin-top:0px;}
		#block1 {float:left;width:210px;margin-left:-210px;position:relative;margin-top:24px;}
		#block2 {float:right;width:210px;margin-right:-210px;position:relative;}
	</style>

	
		<script type="text/javascript">
	        var strparentcategory = getparentcategory();
	
            function getobj(name) {
	            if (document.getElementById(name)) {
		            this.obj = document.getElementById(name);
		            this.style = document.getElementById(name).style;
	            }
            }

            function getparentcategory() {
	            var url = window.location;
	            var urlstring = String(url);

	            if (urlstring.indexOf("gov/home/")>0) {
		            return "home";
	            }
	            else if (urlstring.indexOf("gov/org/")>0) {
		            return "org";
	            }
	            else if (urlstring.indexOf("gov/minutes/")>0) {
		            return "minutes";
	            }
	            else if (urlstring.indexOf("gov/projects/")>0) {
		            return "projects";
	            }
	            else if (urlstring.indexOf("gov/resources/")>0) {
		            return "resources";
	            }
	            else {
		            return "home";
	            }
            }

            function styleparentcategory() {
	            if	(!document.layers) {
		            var x = new getobj("tab" + strparentcategory);
		            var y = new getobj("tab" + strparentcategory + "a");
		            x.style.backgroundImage = "none"
		            x.style.backgroundColor = "#FFF";
		            x.style.borderBottom = "1px solid white";
		            y.style.color = "#336";
	            }
            }
	</script>


<!-- Insert Last Modified Header -->
<% 
  Dim strLastModFileName
  Dim dtmLastModified
  Dim strLastModified
  Dim objLastModFileSystemObject
  Dim objLastModFile

  strLastModFileName = Request.ServerVariables("SCRIPT_NAME")
  strLastModFileName = Replace(strLastModFileName, "/", "\")
  strLastModFileName = Server.MapPath(strLastModFileName)

  Set objLastModFileSystemObject = Server.CreateObject("Scripting.FileSystemObject")

  Set objLastModFile = objLastModFileSystemObject.GetFile(strLastModFileName)
  dtmLastModified = objLastModFile.DateLastModified
  Set objLastModFile = Nothing

  Set objLastModFileSystemObject = Nothing

	function DateToHTTPDate(ByVal OleDATE)
	  Const GMTdiff = #07:00:00#
	  OleDATE = OleDATE + GMTdiff
		DateToHTTPDate = engWeekDayName(OleDATE) & _
		", " & Right("0" & Day(OleDATE),2) & " " & engMonthName(OleDATE) & _
		" " & Year(OleDATE) & " " & Right("0" & Hour(OleDATE),2) & _
		":" & Right("0" & Minute(OleDATE),2) & ":" & Right("0" & Second(OleDATE),2) & " GMT"
	End Function 

	Function engWeekDayName(dt)
		Dim strDay
		Select Case WeekDay(dt,1)
			Case 1:strDay="Sun"
			Case 2:strDay="Mon"
			Case 3:strDay="Tue"
			Case 4:strDay="Wed"
			Case 5:strDay="Thu"
			Case 6:strDay="Fri"
			Case 7:strDay="Sat"
		End Select
		engWeekDayName = strDay
	End Function

	Function engMonthName(dt)
		Dim strMon
		Select Case Month(dt)
			Case 1:strMon="Jan"
			Case 2:strMon="Feb"
			Case 3:strMon="Mar"
			Case 4:strMon="Apr"
			Case 5:strMon="May"
			Case 6:strMon="Jun"
			Case 7:strMon="Jul"
			Case 8:strMon="Aug"
			Case 9:strMon="Sep"
			Case 10:strMon="Oct"
			Case 11:strMon="Nov"
			Case 12:strMon="Dec"
		End Select
		engMonthName = strMon
	End Function
	
	strLastModified = DateToHTTPDate(dtmLastModified)
	
	Response.AddHeader "cache-control", "private, no-cache, must-revalidate"
	Response.AddHeader "Last-Modified", strLastModified
%>
<!-- End Last Modified Header -->

